-- background: 2609 from stack: in
-- bmap block id: 4567
-- flags: 0000
-- background id: 0
-- name: 
----- HyperTalk script -----
on openBackground
  push recent card
end openBackground

on EnterKey
  click at location of background button ID 24
end Enterkey

on opencard
  get background field rating
  set lockscreen to true
  set hilite of background button ID 27 to false
  set hilite of background button ID 28 to false
  set hilite of background button ID 29 to false
  set hilite of background button ID 30 to false
  set hilite of background button ID 31 to false
  set hilite of background button ID 32 to false

  set hilite of background button ID 33 to false
  set hilite of background button ID 34 to false
  set hilite of background button ID 35 to false
  set hilite of background button ID 36 to false
  set hilite of background button ID 37 to false
  set hilite of background button ID 38 to false
  set hilite of background button ID 39 to false
  set hilite of background button ID 40 to false
  set hilite of background button ID 41 to false
  set hilite of background button ID 42 to true

  put field rating + 27 into butid
  set hilite of background button ID butid to true

  get background field catagories
  if it is not empty then
    set hilite of background button ID 42 to false
    if it contains "App" then set hilite of background button ID 33 to true
    if it contains "Bev" then set hilite of background button ID 34 to true
    if it contains "Bre" then set hilite of background button ID 35 to true
    if it contains "Bru" then set hilite of background button ID 36 to true
    if it contains "Cak" then set hilite of background button ID 37 to true
    if it contains "Des" then set hilite of background button ID 38 to true
    if it contains "Main" then set hilite of background button ID 39 to true
    if it contains "Sou" then set hilite of background button ID 40 to true
    if it contains "Veg" then set hilite of background button ID 41 to true

  end if

  set lockscreen to false
end opencard


on closeCard
  if field "Recipe Title" is "" then
    put " " into field "Recipe Title"
    beep
    answer "This card has no title...It will be deleted!" with "Keep it" or "OK"
    if it is "OK" then
      domenu delete card
    end if
  else
    put "" into field catagories
    if hilite of background button ID 33 is true then put "Appetizers " into field Catagories
    if hilite of background button ID 34 is true then put "Beverages " after field Catagories
    if hilite of background button ID 35 is true then put "Breads " after field Catagories
    if hilite of background button ID 36 is true then put "Brunches " after field Catagories
    if hilite of background button ID 37 is true then put "Cakes Pies " after field Catagories
    if hilite of background button ID 38 is true then put "Desserts " after field Catagories
    if hilite of background button ID 39 is true then put "Main Courses " after field Catagories
    if hilite of background button ID 40 is true then put "Soups Salads " after field Catagories
    if hilite of background button ID 41 is true then put "Vegetables " after field Catagories
    if field catagories is "" then set hilite of background button ID 42 to true

  end if

end closecard



-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=72 top=299 right=324 bottom=99
-- title width / last selected line: 0
-- icon id / first selected line: 1014 / 1014
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  visual effect wipe right
  go to previous card
end mouseUp



-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=98 top=299 right=324 bottom=125
-- title width / last selected line: 0
-- icon id / first selected line: 1013 / 1013
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
  visual effect wipe left
  go to next card
end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=16 top=299 right=324 bottom=45
-- title width / last selected line: 0
-- icon id / first selected line: 21700 / 21700
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  visual effect iris open
  go Home
end mouseUp



-- part 16 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=133 top=33 right=68 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 33
-- text size: 14
-- style flags: 0
-- line height: 17
-- part name: Recipe Title


-- part 17 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=139 top=97 right=125 bottom=483
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Keywords


-- part 18 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=140 top=149 right=164 bottom=409
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Book Title


-- part 19 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=422 top=149 right=164 bottom=483
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Page No


-- part 20 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=140 top=190 right=244 bottom=484
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Comments


-- part 21 (field)
-- low flags: 01
-- high flags: 0002
-- rect: left=191 top=255 right=273 bottom=213
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Rating


-- part 23 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=146 top=301 right=323 bottom=238
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find
----- HyperTalk script -----
on mouseUp
  doMenu Find...
end mouseUp



-- part 24 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=263 top=301 right=323 bottom=355
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Card
----- HyperTalk script -----
on mouseUp
  get field "Book Title"
  put it into Booktemp

  put empty into field catagories
  if hilite of background button ID 33 is true then put "Appetizers " into field Catagories
  if hilite of background button ID 34 is true then put "Beverages " after field Catagories
  if hilite of background button ID 35 is true then put "Breads " after field Catagories
  if hilite of background button ID 36 is true then put "Brunches " after field Catagories
  if hilite of background button ID 37 is true then put "Cakes Pies " after field Catagories
  if hilite of background button ID 38 is true then put "Desserts " after field Catagories
  if hilite of background button ID 39 is true then put "Main Courses " after field Catagories
  if hilite of background button ID 40 is true then put "Soups Salads " after field Catagories
  if hilite of background button ID 41 is true then put "Vegetables " after field Catagories
  if field catagories is empty then set hilite of background button ID 42 to true

  get field "Catagories"
  put it into Cattemp
  doMenu "New Card"
  put Cattemp into field "Catagories"
  put booktemp into field "Book Title"
  put "" into field "Recipe Title"
  put "" into field "Keywords"
  put "" into field "Page No"
  put "" into field "Comments"
  click at loc of background button ID 27
  set hilite of background button ID 27 to true

  get background field catagories
  if it is not empty then
    set hilite of background button ID 42 to false
    if it contains "App" then set hilite of background button ID 33 to true
    if it contains "Bev" then set hilite of background button ID 34 to true
    if it contains "Bre" then set hilite of background button ID 35 to true
    if it contains "Bru" then set hilite of background button ID 36 to true
    if it contains "Cak" then set hilite of background button ID 37 to true
    if it contains "Des" then set hilite of background button ID 38 to true
    if it contains "Main" then set hilite of background button ID 39 to true
    if it contains "Sou" then set hilite of background button ID 40 to true
    if it contains "Veg" then set hilite of background button ID 41 to true
  end if

  type tab
end mouseUp



-- part 25 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=384 top=301 right=323 bottom=476
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Delete Card
----- HyperTalk script -----
on mouseUp
  beep
  answer "Do you really want to delete this card?" with "Yes" or "No"
  if it is "Yes" then domenu delete card
end mouseUp



-- part 26 (field)
-- low flags: 81
-- high flags: 4000
-- rect: left=16 top=76 right=282 bottom=121
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Catagories


-- part 27 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=252 top=253 right=275 bottom=288
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: ?
----- HyperTalk script -----
on mouseUp
  put "" into background field rating
  set hilite of background button ID 27 to true
  set hilite of background button ID 28 to false
  set hilite of background button ID 29 to false
  set hilite of background button ID 30 to false
  set hilite of background button ID 31 to false
  set hilite of background button ID 32 to false
end mouseUp



-- part 28 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=300 top=253 right=275 bottom=336
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 1
----- HyperTalk script -----
on mouseUp
  put 1 into background field rating
  set hilite of background button ID 27 to false
  set hilite of background button ID 28 to true
  set hilite of background button ID 29 to false
  set hilite of background button ID 30 to false
  set hilite of background button ID 31 to false
  set hilite of background button ID 32 to false
end mouseUp



-- part 29 (button)
-- low flags: 00
-- high flags: E006
-- rect: left=337 top=253 right=275 bottom=373
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 2
----- HyperTalk script -----
on mouseUp
  put 2 into background field rating
  set hilite of background button ID 27 to false
  set hilite of background button ID 28 to false
  set hilite of background button ID 29 to true
  set hilite of background button ID 30 to false
  set hilite of background button ID 31 to false
  set hilite of background button ID 32 to false
end mouseUp



-- part 30 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=374 top=253 right=275 bottom=410
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 3
----- HyperTalk script -----
on mouseUp
  put 3 into background field rating
  set hilite of background button ID 27 to false
  set hilite of background button ID 28 to false
  set hilite of background button ID 29 to false
  set hilite of background button ID 30 to true
  set hilite of background button ID 31 to false
  set hilite of background button ID 32 to false
end mouseUp



-- part 31 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=411 top=253 right=275 bottom=447
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 4
----- HyperTalk script -----
on mouseUp
  put 4 into background field rating
  set hilite of background button ID 27 to false
  set hilite of background button ID 28 to false
  set hilite of background button ID 29 to false
  set hilite of background button ID 30 to false
  set hilite of background button ID 31 to true
  set hilite of background button ID 32 to false
end mouseUp



-- part 32 (button)
-- low flags: 00
-- high flags: A006
-- rect: left=448 top=253 right=275 bottom=484
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 5
----- HyperTalk script -----
on mouseUp
  put 5 into background field rating
  set hilite of background button ID 27 to false
  set hilite of background button ID 28 to false
  set hilite of background button ID 29 to false
  set hilite of background button ID 30 to false
  set hilite of background button ID 31 to false
  set hilite of background button ID 32 to true
end mouseUp



-- part 33 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=82 right=104 bottom=110
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Appetizers


-- part 34 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=102 right=124 bottom=108
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Beverages


-- part 35 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=122 right=144 bottom=85
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Breads


-- part 36 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=142 right=164 bottom=100
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Brunches


-- part 37 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=162 right=184 bottom=116
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Cakes/Pies


-- part 38 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=182 right=204 bottom=98
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Desserts


-- part 39 (button)
-- low flags: 00
-- high flags: E005
-- rect: left=16 top=202 right=224 bottom=127
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Main Courses


-- part 40 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=222 right=244 bottom=127
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Soups/Salads


-- part 41 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=242 right=264 bottom=116
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Vegetables


-- part 42 (button)
-- low flags: 00
-- high flags: A005
-- rect: left=16 top=262 right=284 bottom=78
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Other


-- part 46 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=44 top=299 right=324 bottom=69
-- title width / last selected line: 0
-- icon id / first selected line: 6720 / 6720
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card id 2983
end mouseUp